VecValueTemp=[191 192 193 197 198 199 200 202 203 204];
for n1=1:size(VecValueTemp,2)
    FilterFourthLevelEditorsCoAuthors(VecValueTemp(1,n1));
    FilterFourthLevelEditorsCoAuthors2(VecValueTemp(1,n1));
end